home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gold Medal Software 2
/
Gold Medal Software Volume 2 (Gold Medal) (1994).iso
/
os2
/
cenvi2.arj
/
ISDAY_2.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1993-06-14
|
744b
|
14 lines
@echo OFF
REM *************************************************************************
REM *** IsDay_2.cmd - This is like IsDay_1.cmd (Set ErrorLevel 1 if it is ***
REM *** requested day of the week, and ErrorLeve 0 if not), ***
REM *** but accomplishes this in only one quick call to ***
REM *** CENVI. Unlike IsDay_1.cmd, this does no error ***
REM *** checking and provides no help. ***
REM *************************************************************************
cenvi day="%1" day[3]=0 return( strstr(strupr(ctime(time())),strupr(day)) ? 1 : 0 )
if ErrorLevel 1 ECHO Yes, today is %1
if not ErrorLevel 1 ECHO No, today is not %1